﻿
Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not Page.IsPostBack Then
            FillActiveSprints(ddlActiveSprints)
        End If
    End Sub

    Public Sub FillActiveSprints(ByVal ddlActiveSprints As DropDownList)
        Dim _bl As New scrumrBL

        _bl.FillActiveSprints(ddlActiveSprints)

    End Sub

    Protected Sub ddlActiveSprints_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlActiveSprints.SelectedIndexChanged
        FillFeaturesForSprint(ddlSprintFeatures, ddlActiveSprints.SelectedValue)
    End Sub

    Public Sub FillFeaturesForSprint(ByVal ddlSprintFeatures As DropDownList, ByVal iSprintID As Integer)
        Dim _bl As New scrumrBL

        _bl.FillFeaturesForSprint(ddlSprintFeatures, iSprintID)
    End Sub

    Protected Sub ddlSprintFeatures_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlSprintFeatures.SelectedIndexChanged
        FillSubtasksForFeatureInSprint(gvSubtasksInSprint, ddlSprintFeatures.SelectedValue)
    End Sub

    Public Sub FillSubtasksForFeatureInSprint(ByVal gvSubtasksInSprint As GridView, ByVal ifeatureID As Integer)
        Dim _bl As New scrumrBL

        _bl.FillSubtasksForFeatureInSprint(gvSubtasksInSprint, ifeatureID)

    End Sub

End Class
